home *** CD-ROM | disk | FTP | other *** search
- .key cmd/a,data/f
- .bra {
- .ket }
-
- ; Foozle-Import-Sript with replace
- ;
- ; cmd : lha
- ; data : Archiv-Name from Foozle
- ;
- ;-------------
-
- ; Unpack archiv. Change Parameter here.
- {cmd} x {data}
-
-
- IF WARN
-
- Echo {cmd} -> Error
-
- ELSE
- move >nil: Inbound:t/#?.pkt Inbound:
- Echo "*NAREA:COMP.SYS.AMIGA.PROGRAMMER -> AREA:CSA.PROGRAMMER"
- replace d Inbound:#?.pkt Inbound:t/ "AREA:COMP.SYS.AMIGA.PROGRAMMER" "AREA:CSA.PROGRAMMER"
-
-
- move >nil: Inbound:t/#?.pkt Inbound:
- echo "*NAREA:COMP.SYS.AMIGA.EMULATIONS -> AREA:CSA.EMULATIONS"
- replace d Inbound:#?.pkt Inbound:t/ "AREA:COMP.SYS.AMIGA.EMULATIONS" "AREA:CSA.EMULATIONS"
-
-
- move >nil: Inbound:#?.pkt Inbound:t/
-
- ENDIF
-